DEFINITION MODULE MyStrings;
(*
  Created:   1987 by
             Stefan Salewski
             Stolper Weg 3
             2160 Stade   West-Germany
             Tel: 04141/61130
             
  Note: compiled with AMIGA Modula-2 System by AMSoft from 5.5.88
   
  This Module may be freely copied. But please
  leave my name in. Thanks....Stefan  
*)

  TYPE
    String=ARRAY[0..80] OF CHAR;
    LongString=ARRAY[0..255] OF CHAR;
  PROCEDURE Assign(VAR Dest:ARRAY OF CHAR;Source:ARRAY OF CHAR);
  PROCEDURE Length(s:ARRAY OF CHAR):CARDINAL;
END MyStrings.def
